home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 015 / proprin4.arc / PROP.BAS next >
BASIC Source File  |  1986-01-02  |  824b  |  21 lines
  1. 10 REM  ***  Set Default Print Setting for the IBM Proprinter
  2. 20 REM  ***  Written and Donated to the Public Domain by -
  3. 30 REM
  4. 40 REM                           Glenn W. Flint
  5. 50 REM                           San Antonio, Texas
  6. 60 REM                           January 2, 1986
  7. 70 REM
  8. 80 REM  *** Creates file named "PROP.INT" that may be typed from DOS
  9. 90 REM  *** Syntax =  A:>type PROP.INT >LPT1 <return>
  10. 100 REM *** Sets Defaults to: 12 Pitch, Normal Font, Skip Perfs (6 lines)
  11. 110 OPEN "PROP.INT" FOR OUTPUT AS #1
  12. 120 PRINT #1, CHR$(18);
  13. 130 PRINT #1, CHR$(27);CHR$(87);CHR$(0);
  14. 140 PRINT #1, CHR$(27);CHR$(58);
  15. 150 PRINT #1, CHR$(27);CHR$(15);
  16. 160 PRINT #1, CHR$(27);CHR$(84);
  17. 170 PRINT #1, CHR$(27);CHR$(70);
  18. 180 PRINT #1, CHR$(27);CHR$(72);
  19. 190 PRINT #1, CHR$(27);CHR$(78);CHR$(6);
  20. 200 CLOSE:END
  21.